***Table 1***
*All Respondents
clear
use "MTurk1.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out dem, r
outreg2 using TableMainAll, replace alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out dem, r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
clear
use "MTurk2.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out dem, r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out dem, r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = covidamount_in
g treatment_out = covidamount_out
reg covidamount treatment_in treatment_out dem if onepartycontinuous == 0, r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
clear
use "YouGov.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out dem [aw = weight], r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out dem [aw = weight], r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = refugee_in
g treatment_out = refugee_out
reg refugeeoutcome treatment_in treatment_out dem [aw = weight], r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
reg infrastructureoutcome treatment_in treatment_out dem [aw = weight] if inf_info_both == 1, r
outreg2 using TableMainAll, append alpha(.01, .05) dec(3) pval
*Democratic Respondents
clear
use "MTurk1.dta"
keep if dem == 1
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out, r
outreg2 using TableMainDem, replace alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out, r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
clear
use "MTurk2.dta"
keep if dem == 1
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out, r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out, r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = covidamount_in
g treatment_out = covidamount_out
reg covidamount treatment_in treatment_out if onepartycontinuous == 0, r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
clear
use "YouGov.dta"
keep if dem == 1
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out [aw = weight], r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out [aw = weight], r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = refugee_in
g treatment_out = refugee_out
reg refugeeoutcome treatment_in treatment_out [aw = weight], r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
reg infrastructureoutcome treatment_in treatment_out [aw = weight] if inf_info_both == 1, r
outreg2 using TableMainDem, append alpha(.01, .05) dec(3) pval
*Republican Respondents
clear
use "MTurk1.dta"
keep if dem == 0
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out, r
outreg2 using TableMainRep, replace alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out, r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval
clear
use "MTurk2.dta"
keep if dem == 0
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out, r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out, r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = covidamount_in
g treatment_out = covidamount_out
reg covidamount treatment_in treatment_out if onepartycontinuous == 0, r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval
clear
use "YouGov.dta"
keep if dem == 0
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome treatment_in treatment_out [aw = weight], r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome treatment_in treatment_out [aw = weight], r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = refugee_in
g treatment_out = refugee_out
reg refugeeoutcome treatment_in treatment_out [aw = weight], r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
reg infrastructureoutcome treatment_in treatment_out [aw = weight] if inf_info_both == 1, r
outreg2 using TableMainRep, append alpha(.01, .05) dec(3) pval


***Table 2***
clear
postutil clear
postfile Interactions in_0 in_0_pval in_1 in_1_pval in_diff in_diff_pval out_0 out_0_pval out_1 out_1_pval out_diff out_diff_pval str25 sample str25 dv str25 moderator using "Interactions.dta", replace 
clear
use "MTurk2.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
g moderator = strongpartisan
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("Minimum Wage") ("Strong Partisan")
drop moderator
g moderator = therm_inparty
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("Minimum Wage") ("Party Thermometer")
drop moderator
g moderator = therm_incand
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("Minimum Wage") ("Leader Thermometer")
drop treatment_in treatment_out moderator
g treatment_in = sudan_in
g treatment_out = sudan_out
g moderator = strongpartisan
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("Sudan") ("Strong Partisan")
drop moderator
g moderator = therm_inparty
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("Sudan") ("Party Thermometer")
drop moderator
g moderator = therm_incand
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("Sudan") ("Leader Thermometer")
keep if onepartycontinuous == 0
drop treatment_in treatment_out moderator
g treatment_in = covidamount_in
g treatment_out = covidamount_out
g moderator = strongpartisan
reg covidamount c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("COVID-19") ("Strong Partisan")
drop moderator
g moderator = therm_inparty
reg covidamount c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("COVID-19") ("Party Thermometer")
drop moderator
g moderator = therm_incand
reg covidamount c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("MTurk2") ("COVID-19") ("Leader Thermometer")
clear
use "YouGov.dta"
g nonleaner = leaner == 0
g extreme1 = inbetween_direct == 0
g extreme2 = inbetween_indirect == 0
g treatment_in = minwage_in
g treatment_out = minwage_out
g moderator = strongpartisan
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Minimum Wage") ("Strong Partisan")
drop moderator
g moderator = nonleaner
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Minimum Wage") ("Non-leaner")
drop moderator
g moderator = thermparty
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Minimum Wage") ("Party Thermometer")
drop moderator
g moderator = thermleader
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Minimum Wage") ("Leader Thermometer")
drop moderator
g moderator = extreme1
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Minimum Wage") ("Extreme 1")
drop moderator
g moderator = extreme2
reg minwageoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Minimum Wage") ("Extreme 2")
drop treatment_in treatment_out moderator
g treatment_in = sudan_in
g treatment_out = sudan_out
g moderator = strongpartisan
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Sudan") ("Strong Partisan")
drop moderator
g moderator = nonleaner
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Sudan") ("Non-leaner")
drop moderator
g moderator = thermparty
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Sudan") ("Party Thermometer")
drop moderator
g moderator = thermleader
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Sudan") ("Leader Thermometer")
drop moderator
g moderator = extreme1
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Sudan") ("Extreme 1")
drop moderator
g moderator = extreme2
reg sudanoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Sudan") ("Extreme 2")
drop treatment_in treatment_out moderator
g treatment_in = refugee_in
g treatment_out = refugee_out
g moderator = strongpartisan
reg refugeeoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Refugees") ("Strong Partisan")
drop moderator
g moderator = nonleaner
reg refugeeoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Refugees") ("Non-leaner")
drop moderator
g moderator = thermparty
reg refugeeoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Refugees") ("Party Thermometer")
drop moderator
g moderator = thermleader
reg refugeeoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Refugees") ("Leader Thermometer")
drop moderator
g moderator = extreme1
reg refugeeoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Refugees") ("Extreme 1")
drop moderator
g moderator = extreme2
reg refugeeoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Refugees") ("Extreme 2")
keep if inf_info_both == 1
drop treatment_in treatment_out moderator
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
g moderator = strongpartisan
reg infrastructureoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Infrastructure") ("Strong Partisan")
drop moderator
g moderator = nonleaner
reg infrastructureoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Infrastructure") ("Non-leaner")
drop moderator
g moderator = thermparty
reg infrastructureoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Infrastructure") ("Party Thermometer")
drop moderator
g moderator = thermleader
reg infrastructureoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Infrastructure") ("Leader Thermometer")
drop moderator
g moderator = extreme1
reg infrastructureoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Infrastructure") ("Extreme 1")
drop moderator
g moderator = extreme2
reg infrastructureoutcome c.treatment_in##c.moderator c.treatment_out##c.moderator dem, r
test _b[treatment_in] + _b[c.treatment_in#c.moderator] = 0
scalar p_in = r(p)
test _b[treatment_out] + _b[c.treatment_out#c.moderator] = 0
scalar p_out = r(p)
post Interactions (_b[treatment_in]) (2*ttail(e(df_r),abs(_b[treatment_in]/_se[treatment_in]))) (_b[treatment_in] + _b[c.treatment_in#c.moderator]) (p_in) (_b[c.treatment_in#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_in#c.moderator]/_se[c.treatment_in#c.moderator]))) (_b[treatment_out]) (2*ttail(e(df_r),abs(_b[treatment_out]/_se[treatment_out]))) (_b[treatment_out] + _b[c.treatment_out#c.moderator]) (p_out) (_b[c.treatment_out#c.moderator]) (2*ttail(e(df_r),abs(_b[c.treatment_out#c.moderator]/_se[c.treatment_out#c.moderator]))) ("YouGov") ("Infrastructure") ("Extreme 2")
postclose Interactions
clear
use "Interactions.dta"
foreach i of varlist in_0-out_diff_pval {
tostring `i', replace format(%5.3f) force
replace `i' = subinstr(`i', "0.", ".", .)
replace `i' = subinstr(`i', "-.000", ".000", .)
replace `i' = trim(`i')
}
foreach i in in_0 in_1 in_diff out_0 out_1 out_diff {
replace `i' = `i' + "(" + `i'_pval + ")"
}
drop *_pval
order sample dv moderator
replace moderator = "Strong" if moderator == "Strong Partisan"
replace moderator = "Party Therm" if moderator == "Party Thermometer"
replace moderator = "Leader Therm" if moderator == "Leader Thermometer"
replace dv = "Min Wage" if dv == "Minimum Wage"
replace dv = "Infrast" if dv == "Infrastructure"


***Table 3***
clear
use "MTurk1.dta"
g treatment_in = fha_in
g treatment_out = fha_out
reg fhaoutcome treatment_in treatment_out dem if fha_oneparty == 1, r
outreg2 using TableNicholson, replace alpha(.01, .05) dec(3) pval
reg fhaoutcome treatment_in treatment_out dem if fha_twoparty == 1, r
outreg2 using TableNicholson, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = immi_in
g treatment_out = immi_out
reg immioutcome treatment_in treatment_out dem if immi_oneparty == 1, r
outreg2 using TableNicholson, append alpha(.01, .05) dec(3) pval
reg immioutcome treatment_in treatment_out dem if immi_twoparty == 1, r
outreg2 using TableNicholson, append alpha(.01, .05) dec(3) pval


***Table 4***
*Covid Relief Experiment
clear
use "MTurk2.dta"
g treatment_in = covidrelief_in
g treatment_out = covidrelief_out
reg covidreliefsupport treatment_in treatment_out dem if onepartyexperiment == 1, r
outreg2 using TableCovidRelief, replace alpha(.01, .05) dec(3) pval
reg covidreliefsupport treatment_in treatment_out dem if twopartyexperiment == 1, r
outreg2 using TableCovidRelief, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = covidamount_in
g treatment_out = covidamount_out
reg covidamount treatment_in dem if onepartycontinuous == 1, r
outreg2 using TableCovidRelief, append alpha(.01, .05) dec(3) pval
reg covidamount treatment_out dem if onepartycontinuous == 1, r
outreg2 using TableCovidRelief, append alpha(.01, .05) dec(3) pval
reg covidamount treatment_in treatment_out dem if onepartycontinuous == 0, r
outreg2 using TableCovidRelief, append alpha(.01, .05) dec(3) pval
*Infrastructure Experiment
clear
use "YouGov.dta"
g treatment_in = inf_binary_in
g treatment_out = inf_binary_out
reg inf_binary_outcome treatment_in treatment_out dem if inf_binary_both == 0 [aw = weight], r
outreg2 using TableInfrastructure, replace alpha(.01, .05) dec(3) pval
reg inf_binary_outcome treatment_in treatment_out dem if inf_binary_both == 1 [aw = weight], r
outreg2 using TableInfrastructure, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
reg infrastructureoutcome treatment_in dem if inf_info_in == 1 [aw = weight], r
outreg2 using TableInfrastructure, append alpha(.01, .05) dec(3) pval
reg infrastructureoutcome treatment_out dem if inf_info_out == 1 [aw = weight], r
outreg2 using TableInfrastructure, append alpha(.01, .05) dec(3) pval
reg infrastructureoutcome treatment_in treatment_out dem if inf_info_both == 1 [aw = weight], r
outreg2 using TableInfrastructure, append alpha(.01, .05) dec(3) pval


***Table A5***
clear
use "YouGov.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
reg minwageoutcome c.treatment_in##c.partylabels c.treatment_out##c.partylabels dem [aw = weight], r
outreg2 using TablePartyLabels, replace alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = sudan_in
g treatment_out = sudan_out
reg sudanoutcome c.treatment_in##c.partylabels c.treatment_out##c.partylabels dem [aw = weight], r
outreg2 using TablePartyLabels, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = refugee_in
g treatment_out = refugee_out
reg refugeeoutcome c.treatment_in##c.partylabels c.treatment_out##c.partylabels dem [aw = weight], r
outreg2 using TablePartyLabels, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
reg infrastructureoutcome c.treatment_in##c.partylabels c.treatment_out##c.partylabels dem [aw = weight] if inf_info_both == 1, r
outreg2 using TablePartyLabels, append alpha(.01, .05) dec(3) pval


***Table A6***
*MTurk 1, Min Wage
clear
use "MTurk1.dta"
egen condition = group(minwage_rep minwage_dem)
preserve
collapse minwage_rep minwage_dem, by(condition)
drop if condition == .
sort condition
save "conditions.dta", replace
restore
postfile Results condition in_coef in_se in_pval out_coef out_se out_pval using "Results.dta", replace
reg minwageoutcome minwage_in minwage_out dem, r
post Results (0) (_b[minwage_in]) (_se[minwage_in]) (2*ttail(e(df_r),abs(_b[minwage_in]/_se[minwage_in]))) (_b[minwage_out]) (_se[minwage_out]) (2*ttail(e(df_r),abs(_b[minwage_out]/_se[minwage_out])))
forvalues i = 1/9 {
reg minwageoutcome minwage_in minwage_out dem if condition != `i', r
post Results (`i') (_b[minwage_in]) (_se[minwage_in]) (2*ttail(e(df_r),abs(_b[minwage_in]/_se[minwage_in]))) (_b[minwage_out]) (_se[minwage_out]) (2*ttail(e(df_r),abs(_b[minwage_out]/_se[minwage_out])))
}
postclose Results
clear
use "Results.dta"
sort condition
merge condition using "conditions.dta"
tab _merge
drop _merge
foreach i of varlist minwage_rep minwage_dem {
tostring `i', replace format(%5.2f) force
replace `i' = trim(`i')
replace `i' = "" if `i' == "."
}
g excluded = "R=$" + minwage_rep + "; D=$" + minwage_dem
replace excluded = "none" if condition == 0

foreach i of varlist in_coef in_se out_coef out_se {
tostring `i', replace format(%5.3f) force
replace `i' = subinstr(`i', "0.", ".", .)
replace `i' = subinstr(`i', "-.000", ".000", .)
replace `i' = trim(`i')
}
foreach i in in_ out_ {
g `i' = `i'coef + " (" + `i'se + ")"
replace `i' = `i' + "*" if `i'pval <= .05
replace `i' = `i' + "*" if `i'pval <= .01
}
keep excluded in_ out_
save "Excluded_Minwage_MTurk1.dta", replace
*MTurk 1, South Sudan
clear
use "MTurk1.dta"
egen condition = group(sudan_rep sudan_dem)
preserve
collapse sudan_rep sudan_dem, by(condition)
drop if condition == .
sort condition
save "conditions.dta", replace
restore
postfile Results condition in_coef in_se in_pval out_coef out_se out_pval using "Results.dta", replace
reg sudanoutcome sudan_in sudan_out dem, r
post Results (0) (_b[sudan_in]) (_se[sudan_in]) (2*ttail(e(df_r),abs(_b[sudan_in]/_se[sudan_in]))) (_b[sudan_out]) (_se[sudan_out]) (2*ttail(e(df_r),abs(_b[sudan_out]/_se[sudan_out])))
forvalues i = 1/9 {
reg sudanoutcome sudan_in sudan_out dem if condition != `i', r
post Results (`i') (_b[sudan_in]) (_se[sudan_in]) (2*ttail(e(df_r),abs(_b[sudan_in]/_se[sudan_in]))) (_b[sudan_out]) (_se[sudan_out]) (2*ttail(e(df_r),abs(_b[sudan_out]/_se[sudan_out])))
}
postclose Results
clear
use "Results.dta"
sort condition
merge condition using "conditions.dta"
tab _merge
drop _merge
foreach i of varlist sudan_rep sudan_dem {
tostring `i', replace format(%5.0f) force
replace `i' = trim(`i')
replace `i' = "" if `i' == "."
}
g excluded = "R=$" + sudan_rep + "M; D=$" + sudan_dem + "M"
replace excluded = "none" if condition == 0

foreach i of varlist in_coef in_se out_coef out_se {
tostring `i', replace format(%5.3f) force
replace `i' = subinstr(`i', "0.", ".", .)
replace `i' = subinstr(`i', "-.000", ".000", .)
replace `i' = trim(`i')
}
foreach i in in_ out_ {
g `i' = `i'coef + " (" + `i'se + ")"
replace `i' = `i' + "*" if `i'pval <= .05
replace `i' = `i' + "*" if `i'pval <= .01
}
keep excluded in_ out_
save "Excluded_Sudan_MTurk1.dta", replace
*MTurk 2, Min Wage
clear
use "MTurk2.dta"
egen condition = group(minwage_rep minwage_dem)
preserve
collapse minwage_rep minwage_dem, by(condition)
sort condition
save "conditions.dta", replace
restore
postfile Results condition in_coef in_se in_pval out_coef out_se out_pval using "Results.dta", replace
reg minwageoutcome minwage_in minwage_out dem, r
post Results (0) (_b[minwage_in]) (_se[minwage_in]) (2*ttail(e(df_r),abs(_b[minwage_in]/_se[minwage_in]))) (_b[minwage_out]) (_se[minwage_out]) (2*ttail(e(df_r),abs(_b[minwage_out]/_se[minwage_out])))
forvalues i = 1/9 {
reg minwageoutcome minwage_in minwage_out dem if condition != `i', r
post Results (`i') (_b[minwage_in]) (_se[minwage_in]) (2*ttail(e(df_r),abs(_b[minwage_in]/_se[minwage_in]))) (_b[minwage_out]) (_se[minwage_out]) (2*ttail(e(df_r),abs(_b[minwage_out]/_se[minwage_out])))
}
postclose Results
clear
use "Results.dta"
sort condition
merge condition using "conditions.dta"
tab _merge
drop _merge
foreach i of varlist minwage_rep minwage_dem {
tostring `i', replace format(%5.2f) force
replace `i' = trim(`i')
replace `i' = "" if `i' == "."
}
g excluded = "R=$" + minwage_rep + "; D=$" + minwage_dem
replace excluded = "none" if condition == 0

foreach i of varlist in_coef in_se out_coef out_se {
tostring `i', replace format(%5.3f) force
replace `i' = subinstr(`i', "0.", ".", .)
replace `i' = subinstr(`i', "-.000", ".000", .)
replace `i' = trim(`i')
}
foreach i in in_ out_ {
g `i' = `i'coef + " (" + `i'se + ")"
replace `i' = `i' + "*" if `i'pval <= .05
replace `i' = `i' + "*" if `i'pval <= .01
}
keep excluded in_ out_
save "Excluded_Minwage_MTurk2.dta", replace
*MTurk 2, Sudan
clear
use "MTurk2.dta"
egen condition = group(sudan_rep sudan_dem)
preserve
collapse sudan_rep sudan_dem, by(condition)
sort condition
save "conditions.dta", replace
restore
postfile Results condition in_coef in_se in_pval out_coef out_se out_pval using "Results.dta", replace
reg sudanoutcome sudan_in sudan_out dem, r
post Results (0) (_b[sudan_in]) (_se[sudan_in]) (2*ttail(e(df_r),abs(_b[sudan_in]/_se[sudan_in]))) (_b[sudan_out]) (_se[sudan_out]) (2*ttail(e(df_r),abs(_b[sudan_out]/_se[sudan_out])))
forvalues i = 1/9 {
reg sudanoutcome sudan_in sudan_out dem if condition != `i', r
post Results (`i') (_b[sudan_in]) (_se[sudan_in]) (2*ttail(e(df_r),abs(_b[sudan_in]/_se[sudan_in]))) (_b[sudan_out]) (_se[sudan_out]) (2*ttail(e(df_r),abs(_b[sudan_out]/_se[sudan_out])))
}
postclose Results
clear
use "Results.dta"
sort condition
merge condition using "conditions.dta"
tab _merge
drop _merge
foreach i of varlist sudan_rep sudan_dem {
tostring `i', replace format(%5.0f) force
replace `i' = trim(`i')
replace `i' = "" if `i' == "."
}
g excluded = "R=$" + sudan_rep + "M; D=$" + sudan_dem + "M"
replace excluded = "none" if condition == 0

foreach i of varlist in_coef in_se out_coef out_se {
tostring `i', replace format(%5.3f) force
replace `i' = subinstr(`i', "0.", ".", .)
replace `i' = subinstr(`i', "-.000", ".000", .)
replace `i' = trim(`i')
}
foreach i in in_ out_ {
g `i' = `i'coef + " (" + `i'se + ")"
replace `i' = `i' + "*" if `i'pval <= .05
replace `i' = `i' + "*" if `i'pval <= .01
}
keep excluded in_ out_
save "Excluded_Sudan_MTurk2.dta", replace


***Figure A1***
*MTurk 1, Min Wage
clear
use "MTurk1.dta"
g dem12 = minwage_dem == 12.5
g dem15 = minwage_dem == 15
g rep10 = minwage_rep == 10
g rep12 = minwage_rep == 12.5
reg minwageoutcome dem12 dem15 rep10 rep12 if dem == 1, r
postfile ResultsDem dem treatment coef sterr using "ResultsDem.dta", replace
post ResultsDem (1) (10) (0) (.)
post ResultsDem (1) (12.5) (_b[dem12]) (_se[dem12])
post ResultsDem (1) (15) (_b[dem15]) (_se[dem15])
post ResultsDem (0) (7.25) (0) (.)
post ResultsDem (0) (10) (_b[rep10]) (_se[rep10])
post ResultsDem (0) (12.5) (_b[rep12]) (_se[rep12])
postclose ResultsDem
reg minwageoutcome dem12 dem15 rep10 rep12 if dem == 0, r
postfile ResultsRep dem treatment coef sterr using "ResultsRep.dta", replace
post ResultsRep (1) (10) (0) (.)
post ResultsRep (1) (12.5) (_b[dem12]) (_se[dem12])
post ResultsRep (1) (15) (_b[dem15]) (_se[dem15])
post ResultsRep (0) (7.25) (0) (.)
post ResultsRep (0) (10) (_b[rep10]) (_se[rep10])
post ResultsRep (0) (12.5) (_b[rep12]) (_se[rep12])
postclose ResultsRep
clear
use "ResultsDem.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 7.25 15 7.75 , tickset(major) ruletype(range) 
gr_edit .xaxis1.add_ticks 10 `"10"', tickset(major)
gr_edit .xaxis1.add_ticks 12.5 `"12.50"', tickset(major)
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 1 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.515 `upper' 12.515 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 15
local coef = r(mean)
sum sterr if dem == 1 & treatment == 15
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 15 `upper' 15 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 10
local coef = r(mean)
sum sterr if dem == 0 & treatment == 10
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 10 `upper' 10 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 0 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.485 `upper' 12.485 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 1.5 .5 , tickset(major) ruletype(range) 
gr_edit .yaxis1.plotregion.yscale.curmin = -.1
gr_edit .yaxis1.plotregion.yscale.curmax = 1.6
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Dem respondents, MTurk 1
graph save "LinearityMinwagePelosiDem.gph", replace
clear
use "ResultsRep.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 7.25 15 7.75 , tickset(major) ruletype(range) 
gr_edit .xaxis1.add_ticks 10 `"10"', tickset(major)
gr_edit .xaxis1.add_ticks 12.5 `"12.50"', tickset(major)
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 1 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.515 `upper' 12.515 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 15
local coef = r(mean)
sum sterr if dem == 1 & treatment == 15
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 15 `upper' 15 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 10
local coef = r(mean)
sum sterr if dem == 0 & treatment == 10
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 10 `upper' 10 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 0 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.485 `upper' 12.485 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 1.5 .5 , tickset(major) ruletype(range) 
gr_edit .yaxis1.plotregion.yscale.curmin = -.4
gr_edit .yaxis1.plotregion.yscale.curmax = 1.8
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Rep respondents, MTurk 1
graph save "LinearityMinwagePelosiRep.gph", replace
*MTurk 2, Min Wage
clear
use "MTurk2.dta"
g dem12 = minwage_dem == 12.5
g dem15 = minwage_dem == 15
g rep10 = minwage_rep == 10
g rep12 = minwage_rep == 12.5
reg minwageoutcome dem12 dem15 rep10 rep12 if dem == 1, r
postfile ResultsDem dem treatment coef sterr using "ResultsDem.dta", replace
post ResultsDem (1) (10) (0) (.)
post ResultsDem (1) (12.5) (_b[dem12]) (_se[dem12])
post ResultsDem (1) (15) (_b[dem15]) (_se[dem15])
post ResultsDem (0) (7.25) (0) (.)
post ResultsDem (0) (10) (_b[rep10]) (_se[rep10])
post ResultsDem (0) (12.5) (_b[rep12]) (_se[rep12])
postclose ResultsDem
reg minwageoutcome dem12 dem15 rep10 rep12 if dem == 0, r
postfile ResultsRep dem treatment coef sterr using "ResultsRep.dta", replace
post ResultsRep (1) (10) (0) (.)
post ResultsRep (1) (12.5) (_b[dem12]) (_se[dem12])
post ResultsRep (1) (15) (_b[dem15]) (_se[dem15])
post ResultsRep (0) (7.25) (0) (.)
post ResultsRep (0) (10) (_b[rep10]) (_se[rep10])
post ResultsRep (0) (12.5) (_b[rep12]) (_se[rep12])
postclose ResultsRep
clear
use "ResultsDem.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 7.25 15 7.75 , tickset(major) ruletype(range) 
gr_edit .xaxis1.add_ticks 10 `"10"', tickset(major)
gr_edit .xaxis1.add_ticks 12.5 `"12.50"', tickset(major)
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 1 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.515 `upper' 12.515 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 15
local coef = r(mean)
sum sterr if dem == 1 & treatment == 15
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 15 `upper' 15 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 10
local coef = r(mean)
sum sterr if dem == 0 & treatment == 10
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 10 `upper' 10 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 0 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.485 `upper' 12.485 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 2 .5 , tickset(major) ruletype(range) 
gr_edit .yaxis1.plotregion.yscale.curmin = -.2
*gr_edit .yaxis1.plotregion.yscale.curmax = 1.6
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Dem respondents, MTurk 2
graph save "LinearityMinwageBidenDem.gph", replace
clear
use "ResultsRep.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 7.25 15 7.75 , tickset(major) ruletype(range) 
gr_edit .xaxis1.add_ticks 10 `"10"', tickset(major)
gr_edit .xaxis1.add_ticks 12.5 `"12.50"', tickset(major)
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 1 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.515 `upper' 12.515 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 15
local coef = r(mean)
sum sterr if dem == 1 & treatment == 15
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 15 `upper' 15 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 10
local coef = r(mean)
sum sterr if dem == 0 & treatment == 10
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 10 `upper' 10 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 12.5
local coef = r(mean)
sum sterr if dem == 0 & treatment == 12.5
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 12.485 `upper' 12.485 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 2 .5 , tickset(major) ruletype(range) 
gr_edit .yaxis1.plotregion.yscale.curmin = -.05
*gr_edit .yaxis1.plotregion.yscale.curmax = 2
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Rep respondents, MTurk 2
graph save "LinearityMinwageBidenRep.gph", replace
*combine all four
graph combine "LinearityMinwagePelosiDem.gph" "LinearityMinwagePelosiRep.gph" "LinearityMinwageBidenDem.gph" "LinearityMinwageBidenRep.gph", col(2)
gr_edit .style.editstyle margin(zero) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
graph export "LinearityMinwage.png", replace as(png)


***Figure A2***
*MTurk1, South Sudan
clear
use "MTurk1.dta"
g dem600 = sudan_dem == 600
g dem900 = sudan_dem == 900
g rep600 = sudan_rep == 600
g rep900 = sudan_rep == 900
reg sudanoutcome dem600 dem900 rep600 rep900 if dem == 1, r
postfile ResultsDem dem treatment coef sterr using "ResultsDem.dta", replace
post ResultsDem (1) (3) (0) (.)
post ResultsDem (1) (6) (_b[dem600]) (_se[dem600])
post ResultsDem (1) (9) (_b[dem900]) (_se[dem900])
post ResultsDem (0) (3) (0) (.)
post ResultsDem (0) (6) (_b[rep600]) (_se[rep600])
post ResultsDem (0) (9) (_b[rep900]) (_se[rep900])
postclose ResultsDem
reg sudanoutcome dem600 dem900 rep600 rep900 if dem == 0, r
postfile ResultsRep dem treatment coef sterr using "ResultsRep.dta", replace
post ResultsRep (1) (3) (0) (.)
post ResultsRep (1) (6) (_b[dem600]) (_se[dem600])
post ResultsRep (1) (9) (_b[dem900]) (_se[dem900])
post ResultsRep (0) (3) (0) (.)
post ResultsRep (0) (6) (_b[rep600]) (_se[rep600])
post ResultsRep (0) (9) (_b[rep900]) (_se[rep900])
postclose ResultsRep
clear
use "ResultsDem.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 3 9 3 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 6
local coef = r(mean)
sum sterr if dem == 1 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 6.01 `upper' 6.01 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 9
local coef = r(mean)
sum sterr if dem == 1 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 9.01 `upper' 9.01 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 6
local coef = r(mean)
sum sterr if dem == 0 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 5.99 `upper' 5.99 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 9
local coef = r(mean)
sum sterr if dem == 0 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 8.99 `upper' 8.99 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 2 .5 , tickset(major) ruletype(range) 
*gr_edit .yaxis1.plotregion.yscale.curmin = -.1
gr_edit .yaxis1.plotregion.yscale.curmax = 2.1
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Dem respondents, MTurk 1
graph save "LinearitySudanPelosiDem.gph", replace
clear
use "ResultsRep.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 3 9 3 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 6
local coef = r(mean)
sum sterr if dem == 1 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 6.01 `upper' 6.01 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 9
local coef = r(mean)
sum sterr if dem == 1 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 9.01 `upper' 9.01 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 6
local coef = r(mean)
sum sterr if dem == 0 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 5.99 `upper' 5.99 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 9
local coef = r(mean)
sum sterr if dem == 0 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 8.99 `upper' 8.99 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 1.5 .5 , tickset(major) ruletype(range) 
*gr_edit .yaxis1.plotregion.yscale.curmin = -.1
gr_edit .yaxis1.plotregion.yscale.curmax = 1.7
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Rep respondents, MTurk 1
graph save "LinearitySudanPelosiRep.gph", replace
*MTurk 2, South Sudan
clear
use "MTurk2.dta"
g dem600 = sudan_dem == 600
g dem900 = sudan_dem == 900
g rep600 = sudan_rep == 600
g rep900 = sudan_rep == 900
reg sudanoutcome dem600 dem900 rep600 rep900 if dem == 1, r
postfile ResultsDem dem treatment coef sterr using "ResultsDem.dta", replace
post ResultsDem (1) (3) (0) (.)
post ResultsDem (1) (6) (_b[dem600]) (_se[dem600])
post ResultsDem (1) (9) (_b[dem900]) (_se[dem900])
post ResultsDem (0) (3) (0) (.)
post ResultsDem (0) (6) (_b[rep600]) (_se[rep600])
post ResultsDem (0) (9) (_b[rep900]) (_se[rep900])
postclose ResultsDem
reg sudanoutcome dem600 dem900 rep600 rep900 if dem == 0, r
postfile ResultsRep dem treatment coef sterr using "ResultsRep.dta", replace
post ResultsRep (1) (3) (0) (.)
post ResultsRep (1) (6) (_b[dem600]) (_se[dem600])
post ResultsRep (1) (9) (_b[dem900]) (_se[dem900])
post ResultsRep (0) (3) (0) (.)
post ResultsRep (0) (6) (_b[rep600]) (_se[rep600])
post ResultsRep (0) (9) (_b[rep900]) (_se[rep900])
postclose ResultsRep
clear
use "ResultsDem.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 3 9 3 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 6
local coef = r(mean)
sum sterr if dem == 1 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 6.01 `upper' 6.01 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 9
local coef = r(mean)
sum sterr if dem == 1 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 9.01 `upper' 9.01 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 6
local coef = r(mean)
sum sterr if dem == 0 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 5.99 `upper' 5.99 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 9
local coef = r(mean)
sum sterr if dem == 0 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 8.99 `upper' 8.99 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 2.5 .5 , tickset(major) ruletype(range) 
*gr_edit .yaxis1.plotregion.yscale.curmin = -.1
*gr_edit .yaxis1.plotregion.yscale.curmax = 2.1
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Dem respondents, MTurk 2
graph save "LinearitySudanBidenDem.gph", replace
clear
use "ResultsRep.dta"
g dcoef = coef if dem == 1
g rcoef = coef if dem == 0
graph twoway (line dcoef rcoef treatment) (scatter dcoef rcoef treatment)
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Estimated Effect
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Treatment
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule 3 9 3 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(medthick)) editcopy
gr_edit .plotregion1.plot3.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(blue) linestyle(color(blue))) editcopy
gr_edit .plotregion1.plot4.style.editstyle marker(size(medlarge) symbol(circle) fillcolor(red) linestyle(color(red))) editcopy
sum coef if dem == 1 & treatment == 6
local coef = r(mean)
sum sterr if dem == 1 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 6.01 `upper' 6.01 `lower'
gr_edit .plotregion1.added_lines_new = 1
gr_edit .plotregion1.added_lines_rec = 1
gr_edit .plotregion1.added_lines[1].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 1 & treatment == 9
local coef = r(mean)
sum sterr if dem == 1 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 9.01 `upper' 9.01 `lower'
gr_edit .plotregion1.added_lines_new = 2
gr_edit .plotregion1.added_lines_rec = 2
gr_edit .plotregion1.added_lines[2].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(blue) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 6
local coef = r(mean)
sum sterr if dem == 0 & treatment == 6
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 5.99 `upper' 5.99 `lower'
gr_edit .plotregion1.added_lines_new = 3
gr_edit .plotregion1.added_lines_rec = 3
gr_edit .plotregion1.added_lines[3].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
sum coef if dem == 0 & treatment == 9
local coef = r(mean)
sum sterr if dem == 0 & treatment == 9
local upper = `coef' + r(mean)
local lower = `coef' - r(mean)
gr_edit .plotregion1.AddLine added_lines editor 8.99 `upper' 8.99 `lower'
gr_edit .plotregion1.added_lines_new = 4
gr_edit .plotregion1.added_lines_rec = 4
gr_edit .plotregion1.added_lines[4].style.editstyle  linestyle( width( sztype(relative) val(.45) allow_pct(1)) color(red) pattern(solid) align(inside)) headstyle( symbol(circle) linestyle( width( sztype(relative) val(.2) allow_pct(1)) color(blue) pattern(solid) align(inside)) fillcolor(blue) size( sztype(relative) val(1.52778) allow_pct(1)) angle(stdarrow) symangle(zero) backsymbol(none) backline( width( sztype(relative) val(.2) allow_pct(1)) color(black) pattern(solid) align(inside)) backcolor(black) backsize( sztype(relative) val(0) allow_pct(1)) backangle(stdarrow) backsymangle(zero)) headpos(neither) editcopy
gr_edit .yaxis1.reset_rule 0 2 .5 , tickset(major) ruletype(range) 
*gr_edit .yaxis1.plotregion.yscale.curmin = -.1
gr_edit .yaxis1.plotregion.yscale.curmax = 2.2
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Rep respondents, MTurk 2
graph save "LinearitySudanBidenRep.gph", replace
*combine all four
graph combine "LinearitySudanPelosiDem.gph" "LinearitySudanPelosiRep.gph" "LinearitySudanBidenDem.gph" "LinearitySudanBidenRep.gph", col(2)
gr_edit .style.editstyle margin(zero) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
graph export "LinearitySudan.png", replace as(png)


***Figure A3***
*Minimum Wage
clear
use "YouGov.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
g outcome = minwageoutcome
*in-party residuals
reg outcome treatment_out dem [aw = weight]
predict r_outcome_in, residual
reg treatment_in treatment_out dem [aw = weight]
predict r_treatment_in, residual
*lpoly r_outcome_in r_treatment_in, noscatter ci
lpoly r_outcome_in r_treatment_in, nograph gen(k_in) at(r_treatment_in) bw(.5)
*out-party residuals
reg outcome treatment_in dem [aw = weight]
predict r_outcome_out, residual
reg treatment_out treatment_in dem [aw = weight]
predict r_treatment_out, residual
*lpoly r_outcome_out r_treatment_out, noscatter ci
lpoly r_outcome_out r_treatment_out, nograph gen(k_out) at(r_treatment_in) bw(.5)
sort r_treatment_in
graph twoway line k_in k_out r_treatment_in
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Residual Respondent Preferences
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Residual Leader Positions
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
*gr_edit .xaxis1.reset_rule 3 9 3 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule -.4 .8 .4 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(black) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(gs8) width(medthick)) editcopy
*gr_edit .yaxis1.plotregion.yscale.curmax = 1.7
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Minimum Wage
graph save "LinearityYouGovMinWage.gph", replace
*South Sudan
clear
use "YouGov.dta"
g treatment_in = sudan_in
g treatment_out = sudan_out
g outcome = sudanoutcome
*in-party residuals
reg outcome treatment_out dem [aw = weight]
predict r_outcome_in, residual
reg treatment_in treatment_out dem [aw = weight]
predict r_treatment_in, residual
*lpoly r_outcome_in r_treatment_in, noscatter ci
lpoly r_outcome_in r_treatment_in, nograph gen(k_in) at(r_treatment_in) bw(.5)
*out-party residuals
reg outcome treatment_in dem [aw = weight]
predict r_outcome_out, residual
reg treatment_out treatment_in dem [aw = weight]
predict r_treatment_out, residual
*lpoly r_outcome_out r_treatment_out, noscatter ci
lpoly r_outcome_out r_treatment_out, nograph gen(k_out) at(r_treatment_in) bw(.5)
sort r_treatment_in
graph twoway line k_in k_out r_treatment_in
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Residual Respondent Preferences
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Residual Leader Positions
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
*gr_edit .yaxis1.reset_rule -.4 .8 .4 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(black) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(gs8) width(medthick)) editcopy
*gr_edit .yaxis1.plotregion.yscale.curmax = 1.7
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush South Sudan
graph save "LinearityYouGovSudan.gph", replace
*Refugees
clear
use "YouGov.dta"
g treatment_in = refugee_in
g treatment_out = refugee_out
g outcome = refugeeoutcome
*in-party residuals
reg outcome treatment_out dem [aw = weight]
predict r_outcome_in, residual
reg treatment_in treatment_out dem [aw = weight]
predict r_treatment_in, residual
*lpoly r_outcome_in r_treatment_in, noscatter ci
lpoly r_outcome_in r_treatment_in, nograph gen(k_in) at(r_treatment_in) bw(10)
*out-party residuals
reg outcome treatment_in dem [aw = weight]
predict r_outcome_out, residual
reg treatment_out treatment_in dem [aw = weight]
predict r_treatment_out, residual
*lpoly r_outcome_out r_treatment_out, noscatter ci
lpoly r_outcome_out r_treatment_out, nograph gen(k_out) at(r_treatment_in) bw(10)
sort r_treatment_in
graph twoway line k_in k_out r_treatment_in
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Residual Respondent Preferences
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Residual Leader Positions
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule -50 50 25, tickset(major) ruletype(range) 
*gr_edit .yaxis1.reset_rule -.4 .8 .4 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(black) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(gs8) width(medthick)) editcopy
*gr_edit .yaxis1.plotregion.yscale.curmax = 1.7
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Refugees
graph save "LinearityYouGovRefugees.gph", replace
*Infrastructure
clear
use "YouGov.dta"
keep if inf_info_both == 1
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
g outcome = infrastructureoutcome
*in-party residuals
reg outcome treatment_out dem [aw = weight]
predict r_outcome_in, residual
reg treatment_in treatment_out dem [aw = weight]
predict r_treatment_in, residual
lpoly r_outcome_in r_treatment_in, noscatter ci
lpoly r_outcome_in r_treatment_in, nograph gen(k_in) at(r_treatment_in) bw(.3)
*out-party residuals
reg outcome treatment_in dem [aw = weight]
predict r_outcome_out, residual
reg treatment_out treatment_in dem [aw = weight]
predict r_treatment_out, residual
lpoly r_outcome_out r_treatment_out, noscatter ci
lpoly r_outcome_out r_treatment_out, nograph gen(k_out) at(r_treatment_in) bw(.3)
sort r_treatment_in
graph twoway line k_in k_out r_treatment_in
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Residual Respondent Preferences
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Residual Leader Positions
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .xaxis1.reset_rule -.6 .6 .3 , tickset(major) ruletype(range) 
*gr_edit .yaxis1.reset_rule -.4 .8 .4 , tickset(major) ruletype(range) 
gr_edit .plotregion1.plot1.style.editstyle line(color(black) width(medthick)) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(gs8) width(medthick)) editcopy
*gr_edit .yaxis1.plotregion.yscale.curmax = 1.7
gr_edit .title.style.editstyle color(black) size(medium) editcopy
gr_edit .title.text = {}
gr_edit .title.text.Arrpush Infrastructure
graph save "LinearityYouGovInfrastructure.gph", replace
*combine all four
graph combine "LinearityYouGovMinwage.gph" "LinearityYouGovSudan.gph" "LinearityYouGovRefugees.gph" "LinearityYouGovInfrastructure.gph", col(2)
gr_edit .style.editstyle margin(zero) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
graph export "LinearityYouGov.png", replace as(png)


***Table A7***
clear
use "MTurk1.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg minwageoutcome c.treatment_in##c.treatment_out dem, r
outreg2 using TableInOut, replace alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out mean_*
g treatment_in = sudan_in
g treatment_out = sudan_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg sudanoutcome c.treatment_in##c.treatment_out dem, r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval
clear
use "MTurk2.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg minwageoutcome c.treatment_in##c.treatment_out dem, r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out mean_*
g treatment_in = sudan_in
g treatment_out = sudan_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg sudanoutcome c.treatment_in##c.treatment_out dem, r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out mean_*
g treatment_in = covidamount_in
g treatment_out = covidamount_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg covidamount c.treatment_in##c.treatment_out dem if onepartycontinuous == 0, r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval
clear
use "YouGov.dta"
g treatment_in = minwage_in
g treatment_out = minwage_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg minwageoutcome c.treatment_in##c.treatment_out dem [aw = weight], r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out mean_*
g treatment_in = sudan_in
g treatment_out = sudan_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg sudanoutcome c.treatment_in##c.treatment_out dem [aw = weight], r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out mean_*
g treatment_in = refugee_in
g treatment_out = refugee_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg refugeeoutcome c.treatment_in##c.treatment_out dem [aw = weight], r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval
drop treatment_in treatment_out mean_*
g treatment_in = infrastructure_in
g treatment_out = infrastructure_out
foreach i in treatment_in treatment_out {
egen mean_`i' = mean(`i'), by(dem)
replace `i' = `i' - mean_`i'
}
reg infrastructureoutcome c.treatment_in##c.treatment_out dem [aw = weight] if inf_info_both == 1, r
outreg2 using TableInOut, append alpha(.01, .05) dec(3) pval

***Table A8***
clear
use "MTurk1.dta"
reg minwageoutcome minwage_in minwage_out dem, r
outreg2 using TableAgreement, replace alpha(.01, .05) dec(3) pval
scalar combined = _b[minwage_in] + _b[minwage_out]
disp combined
reg minwageoutcome minwage_in dem if minwage_in == minwage_out, r
outreg2 using TableAgreement, append alpha(.01, .05) dec(3) pval
test minwage_in = combined
reg sudanoutcome sudan_in sudan_out dem, r
outreg2 using TableAgreement, append alpha(.01, .05) dec(3) pval
scalar combined = _b[sudan_in] + _b[sudan_out]
disp combined
reg sudanoutcome sudan_in dem if sudan_in == sudan_out, r
outreg2 using TableAgreement, append alpha(.01, .05) dec(3) pval
test sudan_in = combined
clear
use "MTurk2.dta"
reg minwageoutcome minwage_in minwage_out dem, r
outreg2 using TableAgreement, append alpha(.01, .05) dec(3) pval
scalar combined = _b[minwage_in] + _b[minwage_out]
disp combined
reg minwageoutcome minwage_in dem if minwage_in == minwage_out, r
outreg2 using TableAgreement, append alpha(.01, .05) dec(3) pval
test minwage_in = combined
reg sudanoutcome sudan_in sudan_out dem, r
outreg2 using TableAgreement, append alpha(.01, .05) dec(3) pval
scalar combined = _b[sudan_in] + _b[sudan_out]
disp combined
reg sudanoutcome sudan_in dem if sudan_in == sudan_out, r
outreg2 using TableAgreement, append alpha(.01, .05) dec(3) pval
test sudan_in = combined


***Table A9***
clear
use "MTurk1.dta"
g fha_insupport = fha_in == 1
g fha_outsupport = fha_out == 1
reg fhaoutcome fha_insupport fha_outsupport dem if fha_oneparty == 1, r
outreg2 using TableNicholsonAppendix, replace alpha(.01, .05) dec(3) pval
g fha_insupport_outoppose = fha_in == 1 & fha_out == -1
g fha_insupport_outsupport = fha_in == 1 & fha_out == 1
g fha_inoppose_outsupport = fha_in == -1 & fha_out == 1
g fha_inoppose_outoppose = fha_in == -1 & fha_out == -1
reg fhaoutcome fha_inoppose_outoppose fha_inoppose_outsupport fha_insupport_outoppose fha_insupport_outsupport dem if fha_twoparty == 1, r
outreg2 using TableNicholsonAppendix, append alpha(.01, .05) dec(3) pval
g immi_insupport = immi_in == 1
g immi_outsupport = immi_out == 1
reg immioutcome immi_insupport immi_outsupport dem if immi_oneparty == 1, r
outreg2 using TableNicholsonAppendix, append alpha(.01, .05) dec(3) pval
g immi_insupport_outoppose = immi_in == 1 & immi_out == -1
g immi_insupport_outsupport = immi_in == 1 & immi_out == 1
g immi_inoppose_outsupport = immi_in == -1 & immi_out == 1
g immi_inoppose_outoppose = immi_in == -1 & immi_out == -1
reg immioutcome immi_inoppose_outoppose immi_inoppose_outsupport immi_insupport_outoppose immi_insupport_outsupport dem if immi_twoparty == 1, r
outreg2 using TableNicholsonAppendix, append alpha(.01, .05) dec(3) pval



*Distributions of Outcome Variables
*Figure A4, MTurk1
clear
use "MTurk1.dta"
g values = 50*(_n - 1)/(_N - 1)
kdensity minwageoutcome if dem == 1, gen(k_dem) at(values) bw(2) nograph
kdensity minwageoutcome if rep == 1, gen(k_rep) at(values) bw(2) nograph
sort values
graph twoway line k_dem k_rep values if values <= 25
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Federal Minimum Wage ($/hr)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .12 .04 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "MTurk1_MinWage.gph", replace
clear
use "MTurk1.dta"
g values = 20*(_n - 1)/(_N - 1)
kdensity sudanoutcome if dem == 1, gen(k_dem) at(values) bw(1.5) nograph
kdensity sudanoutcome if rep == 1, gen(k_rep) at(values) bw(1.5) nograph
sort values
graph twoway line k_dem k_rep values if values <= 10
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Foreign Aid to South Sudan (hundreds of millions of dollars)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .12 .04 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "MTurk1_SouthSudan.gph", replace
graph combine "MTurk1_Minwage.gph" "MTurk1_SouthSudan.gph", col(2)
gr_edit .style.editstyle margin(zero) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .style.editstyle declared_xsize(8) editcopy
gr_edit .style.editstyle declared_ysize(3) editcopy
graph export "Density_MTurk1.png", replace as(png)

*Figure A5, MTurk2
clear
use "MTurk2.dta"
g values = 50*(_n - 1)/(_N - 1)
kdensity minwageoutcome if dem == 1, gen(k_dem) at(values) bw(2) nograph
kdensity minwageoutcome if rep == 1, gen(k_rep) at(values) bw(2) nograph
sort values
graph twoway line k_dem k_rep values if values <= 25
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Federal Minimum Wage ($/hr)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .12 .04 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "MTurk2_MinWage.gph", replace
clear
use "MTurk2.dta"
g values = 20*(_n - 1)/(_N - 1)
kdensity sudanoutcome if dem == 1, gen(k_dem) at(values) bw(1.5) nograph
kdensity sudanoutcome if rep == 1, gen(k_rep) at(values) bw(1.5) nograph
sort values
graph twoway line k_dem k_rep values if values <= 10
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Foreign Aid to South Sudan (hundreds of millions of dollars)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .12 .04 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "MTurk2_SouthSudan.gph", replace
clear
use "MTurk2.dta"
g values = 10*(_n - 1)/(_N - 1)
kdensity covidamount if dem == 1, gen(k_dem) at(values) bw(0.5) nograph
kdensity covidamount if rep == 1, gen(k_rep) at(values) bw(0.5) nograph
sort values
graph twoway line k_dem k_rep values if values <= 5
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred COVID-19 Relief Spending (trillions of dollars)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .4 .2 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "MTurk2_COVID.gph", replace
graph combine "MTurk2_Minwage.gph" "MTurk2_SouthSudan.gph" "MTurk2_COVID.gph", col(2)
gr_edit .style.editstyle margin(zero) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .style.editstyle declared_xsize(8) editcopy
gr_edit .style.editstyle declared_ysize(4.5) editcopy
graph export "Density_MTurk2.png", replace as(png)

*Figure A6, YouGov
clear
use "YouGov.dta"
g values = 50*(_n - 1)/(_N - 1)
kdensity minwageoutcome if dem == 1, gen(k_dem) at(values) bw(2) nograph
kdensity minwageoutcome if dem == 0, gen(k_rep) at(values) bw(2) nograph
sort values
graph twoway line k_dem k_rep values if values <= 25
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Federal Minimum Wage ($/hr)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .12 .04 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "YouGov_MinWage.gph", replace
clear
use "YouGov.dta"
g values = 20*(_n - 1)/(_N - 1)
kdensity sudanoutcome if dem == 1, gen(k_dem) at(values) bw(1.5) nograph
kdensity sudanoutcome if dem == 0, gen(k_rep) at(values) bw(1.5) nograph
sort values
graph twoway line k_dem k_rep values if values <= 10
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Foreign Aid to South Sudan (hundreds of millions of dollars)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .12 .04 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "YouGov_SouthSudan.gph", replace
clear
use "YouGov.dta"
g values = 1000*(_n - 1)/(_N - 1)
kdensity refugeeoutcome if dem == 1, gen(k_dem) at(values) bw(15) nograph
kdensity refugeeoutcome if dem == 0, gen(k_rep) at(values) bw(15) nograph
sort values
graph twoway line k_dem k_rep values if values <= 200
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Number of Refugees (thousands)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
gr_edit .yaxis1.reset_rule 0 .02 .01 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "YouGov_Refugees.gph", replace
clear
use "YouGov.dta"
g values = 10*(_n - 1)/(_N - 1)
kdensity infrastructureoutcome if dem == 1, gen(k_dem) at(values) bw(.5) nograph
kdensity infrastructureoutcome if dem == 0, gen(k_rep) at(values) bw(.5) nograph
sort values
graph twoway line k_dem k_rep values if values <= 5
gr_edit .legend.draw_view.setstyle, style(no)
gr_edit .yaxis1.title.text = {}
gr_edit .yaxis1.title.text.Arrpush Density
gr_edit .xaxis1.title.text = {}
gr_edit .xaxis1.title.text.Arrpush Preferred Infrastructure Spending (trillions of dollars)
gr_edit .style.editstyle margin(vsmall) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
*gr_edit .xaxis1.reset_rule -3 3 1 , tickset(major) ruletype(range) 
*gr_edit .yaxis1.reset_rule 0 .02 .01 , tickset(major) ruletype(range) 
gr_edit .yaxis1.style.editstyle majorstyle(gridstyle(linestyle(color(white)))) editcopy
gr_edit .plotregion1.plot2.style.editstyle line(color(red) width(thick)) editcopy
gr_edit .plotregion1.plot1.style.editstyle line(color(blue) width(thick)) editcopy
graph save "YouGov_Infrastructure.gph", replace
graph combine "YouGov_Minwage.gph" "YouGov_SouthSudan.gph" "YouGov_Refugees.gph" "YouGov_Infrastructure.gph", col(2)
gr_edit .style.editstyle margin(zero) boxstyle(shadestyle(color(white)) linestyle(color(white))) editcopy
gr_edit .style.editstyle declared_xsize(8) editcopy
gr_edit .style.editstyle declared_ysize(4.5) editcopy
graph export "Density_YouGov.png", replace as(png)

